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FIGURE 47 
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%%% Rules for {.'ELEMENT X (Y,Z)) 

false ? P : X, not (P.1 ):Y. % 1st child is not Y 

false ? P : X, not (P.2):Z. % 2nd child is not Z 

false ? P : X, not P[ _?_ ]. % there are no children 

false ? P : X [N ?_ ], not N = 1 , not N = 2. % there are no other children 

%%% Rules for {[ELEMENT X (Y\Z)) 

false ? P : X [1 ? A], not A:Y, not A:Z % 1st child other than Y or Z 

false ? P : X, not P[ _?_ ]. % there are no children 

false ? P : X[N ?_ ], not N = 1 . %a non-lst child 

%%% Rule for {'.ELEMENT X (Y) * ) 

false ? P : X[ _? C], not C:Y. % a non-Y child 



FIGURE 48 
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